home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / pascal / filedll.com / TEST2.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1991-04-23  |  271 b   |  17 lines
  1. Program DLLTest;
  2.  
  3. uses WinTypes, winprocs,DLLfdlg;
  4. var
  5. aName,
  6. aPath,
  7. aCaption: pChar;
  8.  
  9. begin
  10.      aPath := 'f:\*.*';
  11.      aName := 'FileOpen';
  12.      aCaption := 'Open Default';
  13.  
  14.      DoFileOpen(0, aPath);
  15.      DofileDialog(0, aPath, aName, aCaption);
  16. end.
  17.